home *** CD-ROM | disk | FTP | other *** search
/ Aminet 3 / Aminet 3 - July 1994.iso / Aminet / dev / lang / struct100.lha / Struct1.0 / SpeedTests / Test8.ace < prev    next >
Encoding:
Text File  |  1993-08-22  |  63 b   |  6 lines
  1. for a%=1 to 20
  2. for b&=1 to 500000
  3. z%=peek(a%+b&+120)
  4. next
  5. next
  6.